home
***
CD-ROM
|
disk
|
FTP
|
other
***
search
/
9-Digit Zip Code Directory
/
9-Digit Zip Code Directory (American Business Information) (ABIZIP-12).ISO
/
z4src.zip
/
ZIGOTO.CPP
< prev
next >
Wrap
C/C++ Source or Header
|
1993-08-02
|
6KB
|
196 lines
//----------------------------------------------------------------------------
// MODULE DESCRIPTION
//
// Module: zigoto.cpp
// Title: 9 Digit ZIP Disc Interface
// Notice: John M. Weeder
// Copyright (c) 1993. All rights reserved.
// This module contains proprietary information and should be
// treated as confidential.
//
//----------------------------------------------------------------------------
// MAINTENANCE HISTORY
//
// $Workfile$
// $Revision$
// $Author$
// $Date$
// $Log$
//
//----------------------------------------------------------------------------
// MODULE NARRATIVE
//
// This module contains code for the class ZI_GOTO.
//
// The code in this module may be written in C++ or C.
//
// This module is portable to:
// DOS 3.X+
// MS Windows 3.X+
// OS/2 2.X+
// OS/2 2.0 PM
//
// The following compilers are supported:
// MSC 6.0A
// MSC/C++ 7.0
// Borland C++ 3.1 for DOS
// Borland C++ 1.0 for OS/2 2.X
//
//----------------------------------------------------------------------------
#include <zi.hpp>
#define USE_WIN_GOTO
#if OS_DOS
#include <zid.hpp>
#elif OS_WINDOWS
#include <ziw.hpp>
#else
#include <zio.hpp>
#endif
//----------------------------------------------------------------------------
// Description: Default constructor
// Parameters:
// Returns:
//----------------------------------------------------------------------------
FN_M ZI_GOTO::ZI_GOTO(FIELDID _fid, LONG _lMax, LONG _lMin, LONG _lDft)
: ZN_WINDOW("WIN_GOTO", ZN_LOAD_CENTER|ZN_LOAD_NO_SHOW)
{
ZI_GOTO::Initialize(CL_INIT_CLASS);
Assert(_fid);
fid = _fid;
lMin = MAX(_lMin, 0);
lMax = MAX(_lMax, 0);
lDft = _lDft;
if (lMin > lMax)
lMin = lMax;
if (lDft >= 0)
lDft = MAX(MIN(lMax, lDft), lMin);
Setup();
}
//----------------------------------------------------------------------------
// Description: Destructor
// Parameters:
// Returns:
//----------------------------------------------------------------------------
FN_M ZI_GOTO::~ZI_GOTO()
{
ZI_GOTO::Destroy(FALSE);
Terminate();
}
//----------------------------------------------------------------------------
// Description: Destroy object. Free any resources used by object.
// Normally called by destructor.
// Should allow multiple calls from various classes.
// A class should almost always re-init its variables when
// it is destroyed to prevent accidents.
// Parameters: fDestroyAll Destroy parents also?
// Default is TRUE.
// Returns: TRUE if successful.
//----------------------------------------------------------------------------
BOOL FN_M ZI_GOTO::Destroy(BOOL fDestroyAll)
{
ZI_GOTO::Initialize(CL_INIT_CLASS_VARS);
if (fDestroyAll) // Destroy parent.
ZI_GOTO_PARENT::Destroy(fDestroyAll);
return TRUE;
}
//----------------------------------------------------------------------------
// Description: Default constructor
// Parameters:
// Returns:
//----------------------------------------------------------------------------
BOOL FN_M ZI_GOTO::Goto(FIELDID _fid, LONG _lMax, LONG _lMin, LONG _lDft)
{
PZI_GOTO pzi_goto = new ZI_GOTO(_fid, _lMax, _lMin, _lDft);
if (pzi_goto == NULL)
return _ErrorNoMem();
else if (pzi_goto->IsValid())
{
pzi_goto->Show();
return TRUE;
}
return FALSE;
}
//----------------------------------------------------------------------------
// Description: Initialize object.
// Normally called by constructor.
// Should allow multiple calls from various classes.
// Parameters: sInit Initialization code. May be one of the following:
// CL_INIT_CLASS Reset class variables and
// and dynamic allocations for
// this class only.
// CL_INIT_CLASS_VARS Reset class variables for
// this class only.
// CL_INIT_VARS Reset class variables for
// this class only.
// CL_INIT_ALL Initialize class and all
// parent class, including
// dynamic memory allocation.
// Default is CL_INIT_ALL
// Returns: TRUE if successful.
//----------------------------------------------------------------------------
BOOL FN_M ZI_GOTO::Initialize(SHORT sInit)
{
if (sInit == CL_INIT_VARS || sInit == CL_INIT_ALL)
ZI_GOTO_PARENT::Initialize(sInit);
return TRUE;
}
//----------------------------------------------------------------------------
// Description: Event monitor function.
// Parameters: sEvent Event code
// pv1 Data pointer 1
// pv2 Data pointer 2
// Returns: Event code
//----------------------------------------------------------------------------
ZN_MSG FN_M ZI_GOTO::User(ZN_MSG msg, PVOID, PVOID)
{
switch (msg)
{
case ZN_MSG_INIT:
{
CHAR szFormat[120];
sprintf(szFormat, "(%ld..%ld)", lMin, lMax);
SetString(FID(STR_RANGE), szFormat);
if (lDft >= 0)
SetNumber(FID(STR_GOTO), lDft);
}
return msg;
case ZN_MSG_TERMINATE:
return msg;
}
if (IsError()) // Error condition
return msg;
switch (msg)
{
case BUTTON_OK:
{
CHAR szBuf[40];
LONG lVal;
lVal = atol(GetNumber(FID(STR_GOTO), szBuf));
SendMessage(fid, ZI_MSG_GOTO, (PVOID)MIN(lMax, MAX(lVal, lMin)));
Close();
}
break;
case BUTTON_CANCEL:
Close();
break;
}
return msg;
}
//----------------------------------------------------------------------------
//------------------------------- End of File --------------------------------
//----------------------------------------------------------------------------